{$CLEO .cs}
0000: NOP

:BEGIN
wait 0
if 
   Player.Defined($PLAYER_CHAR)
jf @BEGIN

:INHOS
wait 0 
if 
00FE:   actor $PLAYER_ACTOR sphere 0 in_sphere -1994.3407 2506.3721 999.3252 radius 30.0 30.0 5.0 
jf @INHOS

fade 0 0
wait 2000
fade 1 1000 
wait 1000
11@ = Audiostream.Load("CLEO\AMBHOS.MP3")
Audiostream.PerformAction(11@, PLAY)
0ABC: set_audio_stream_volume 11@ to 0.2
0AC0: set_audio_stream_looped 11@ to 1

:OUTHOS
wait 0 
if
    00FE:   actor $PLAYER_ACTOR sphere 0 in_sphere 2034.3979 -1403.4812 17.0 radius 2.0 2.0 3.0
jf @OUTHOS

fade 0 0
Audiostream.PerformAction(11@, STOP)
wait 2000
fade 1 1000 
wait 1000
jump @BEGIN



